runCont ka (\a -> ...)